<?php
/**
 * @package Joostina
 * @copyright Авторские права (C) 2008-2010 Joostina team. Все права защищены.
 * @license Лицензия http://www.gnu.org/licenses/gpl-2.0.htm GNU/GPL, или help/license.php
 * Joostina! - свободное программное обеспечение распространяемое по условиям лицензии GNU/GPL
 * Для получения информации о используемых расширениях и замечаний об авторском праве, смотрите файл help/copyright.php.
 */

// запрет прямого доступа
defined('_JLINDEX') or die();

$option = JSef::getOption();

if(!isset($SAJAX_INCLUDED)){
	/*
	* GLOBALS AND DEFAULTS
	*
	*/
	$GLOBALS['sajax_version'] = '0.12';
	$GLOBALS['sajax_debug_mode'] = 0;
	$GLOBALS['sajax_export_list'] = array();
	$GLOBALS['sajax_request_type'] = 'GET';
	$GLOBALS['sajax_remote_uri'] = '';
	$GLOBALS['sajax_failure_redirect'] = '';

	//
	// Initialize the Sajax library.
	//
	function sajax_init(){
	}

	// Since str_split used in sajax_get_my_uri is only available on PHP 5, we have
	// to provide an alternative for those using PHP 4.x
	if(!function_exists('str_split')){
		function str_split($string, $split_length = 1){
			$count = strlen($string);
			if($split_length < 1){
				return false;
			} elseif($split_length > $count){
				return array($string);
			} else{
				$num = (int)ceil($count / $split_length);
				$ret = array();
				for($i = 0; $i < $num; $i++){
					$ret[] = substr($string, $i * $split_length, $split_length);
				}
				return $ret;
			}
		}
	}

	//
	// Helper function to return the script's own URI.
	//
	function sajax_get_my_uri(){
		$myURI = _JLPATH_SITE . "/" . JADMIN_BASE . "/ajax.index.php";
		return $myURI;
	}

	$sajax_remote_uri = sajax_get_my_uri() . "?option=$option&act=ajax";

	//
	// Helper function to return an eval()-usable representation
	// of an object in JavaScript.
	//
	function sajax_get_js_repr($value){
		$type = gettype($value);

		if($type == "boolean"){
			return ($value) ? "Boolean(true)" : "Boolean(false)";
		} elseif($type == "integer"){
			return "parseInt($value)";
		} elseif($type == "double"){
			return "parseFloat($value)";
		} elseif($type == "array" || $type == "object"){
			$s = "{ ";
			if($type == "object"){
				$value = get_object_vars($value);
			}
			foreach($value as $k => $v){
				$esc_key = sajax_esc($k);
				if(is_numeric($k)) $s .= "$k: " . sajax_get_js_repr($v) . ", ";
				else $s .= "\"$esc_key\": " . sajax_get_js_repr($v) . ", ";
			}
			if(count($value)) $s = substr($s, 0, -2);
			return $s . " }";
		} else{
			$esc_val = sajax_esc($value);
			$s = "'$esc_val'";
			return $s;
		}
	}

	function sajax_handle_client_request(){
		global $sajax_export_list;
		$mode = '';
		if(!empty($_GET["rs"])) $mode = "get";
		if(!empty($_POST["rs"])) $mode = "post";
		if(empty($mode)) return;
		ob_clean();
		if($mode == "get"){
			// Bust cache in the head
			header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past
			header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
			// always modified
			header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1
			header("Pragma: no-cache"); // HTTP/1.0
			$func_name = $_GET["rs"];
			if(!empty($_GET["rsargs"]))
				$args = $_GET["rsargs"];
			else
				$args = array();
		} else{
			$func_name = $_POST["rs"];
			if(!empty($_POST["rsargs"]))
				$args = $_POST["rsargs"];
			else
				$args = array();
		}

		if(!in_array($func_name, $sajax_export_list)) echo "-:$func_name not callable";
		else{
			echo "+:";
			ob_flush();
			$result = call_user_func_array($func_name, $args);
			echo "var res = " . trim(sajax_get_js_repr($result)) . "; res;";
			ob_flush();
			flush();
		}
		exit;
	}

	function sajax_get_common_js(){
		$option = JSef::getOption();
		global $sajax_debug_mode;
		global $sajax_request_type;

		global $sajax_failure_redirect;

		$t = strtoupper($sajax_request_type);
		if($t != "" && $t != "GET" && $t != "POST") return "// Invalid type: $t.. \n\n";

		ob_start();
		?>

	// remote scripting library
	// (c) copyright 2005 modernmethod, inc
	var sajax_debug_mode = <?php echo $sajax_debug_mode ? "true" : "false"; ?>;
	var sajax_request_type = "<?php echo $t; ?>";
	var sajax_target_id = "";
	var sajax_failure_redirect = "<?php echo $sajax_failure_redirect; ?>";
	var sajax_failed_eval = "";
	var sajax_fail_handle = "";

	function sajax_debug(text) {
	if (sajax_debug_mode)
	alert(text);
	}

	function sajax_init_object() {
	sajax_debug("sajax_init_object() called..")

	var A;

	var msxmlhttp = new Array(
	'Msxml2.XMLHTTP.5.0',
	'Msxml2.XMLHTTP.4.0',
	'Msxml2.XMLHTTP.3.0',
	'Msxml2.XMLHTTP',
	'Microsoft.XMLHTTP');
	for (var i = 0; i < msxmlhttp.length; i++) {
	try {
	A = new ActiveXObject(msxmlhttp[i]);
	} catch (e) {
	A = null;
	}
	}

	if(!A && typeof XMLHttpRequest != "undefined")
	A = new XMLHttpRequest();
	if (!A)
	sajax_debug("Could not create connection object.");
	return A;
	}

	var sajax_requests = new Array();

	function sajax_cancel() {
	for (var i = 0; i < sajax_requests.length; i++)
	sajax_requests[i].abort();
	}

	function sajax_do_call(func_name, args) {
	var i, x, n;
	var uri;
	var post_data;
	var target_id;

	sajax_debug("in sajax_do_call().." + sajax_request_type + "/" + sajax_target_id);
	target_id = sajax_target_id;
	if (typeof(sajax_request_type) == "undefined" || sajax_request_type == "")
	sajax_request_type = "GET";

	uri = "<?php echo sajax_get_my_uri() . "?option=$option&no_html=1&act=ajax"; ?>";
	if (sajax_request_type == "GET") {

	if (uri.indexOf("?") == -1)
	uri += "?rs=" + escape(func_name);
	else
	uri += "&rs=" + escape(func_name);
	uri += "&rst=" + escape(sajax_target_id);
	uri += "&rsrnd=" + new Date().getTime();

	for (i = 0; i < args.length-1; i++)
	uri += "&rsargs[]=" + escape(args[i]);

	post_data = null;
	}
	else if (sajax_request_type == "POST") {
	post_data = "rs=" + escape(func_name);
	post_data += "&rst=" + escape(sajax_target_id);
	post_data += "&rsrnd=" + new Date().getTime();

	for (i = 0; i < args.length-1; i++)
	post_data = post_data + "&rsargs[]=" + escape(args[i]);
	}
	else {
	alert("Illegal request type: " + sajax_request_type);
	}

	x = sajax_init_object();
	if (x == null) {
	if (sajax_failure_redirect != "") {
	location.href = sajax_failure_redirect;
	return false;
	} else {
	sajax_debug("NULL sajax object for user agent:\n" + navigator.userAgent);
	return false;
	}
	} else {
	x.open(sajax_request_type, uri, true);
	// window.open(uri);

	sajax_requests[sajax_requests.length] = x;

	if (sajax_request_type == "POST") {
	x.setRequestHeader("Method", "POST " + uri + " HTTP/1.1");
	x.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
	}

	x.onreadystatechange = function() {
	if (x.readyState != 4)
	return;

	sajax_debug("received " + x.responseText);

	var status;
	var data;
	var txt = x.responseText.replace(/^\s*|\s*$/g,"");
	status = txt.charAt(0);
	data = txt.substring(2);

	if (status == "") {
	// let's just assume this is a pre-response bailout and let it slide for now
	} else if (status == "-")
	alert("Error: " + data);
	else {
	if (target_id != "")
	document.getElementById(target_id).innerHTML = eval(data);
	else {
	try {
	var callback;
	var extra_data = false;
	if (typeof args[args.length-1] == "object") {
	callback = args[args.length-1].callback;
	extra_data = args[args.length-1].extra_data;
	} else {
	callback = args[args.length-1];
	}
	callback(eval(data), extra_data);
	} catch (e) {
	sajax_debug("Caught error " + e + ": Could not eval " + data );
	sajax_failed_eval = data;
	sajax_fail_handle(data);
	}
	}
	}
	}
	}

	sajax_debug(func_name + " uri = " + uri + "/post = " + post_data);
	x.send(post_data);
	sajax_debug(func_name + " waiting..");
	delete x;
	return true;
	}

	<?php
		$html = ob_get_contents();
		ob_end_clean();
		return $html;
	}

	function sajax_show_common_js(){
		echo sajax_get_common_js();
	}

	// javascript escape a value
	function sajax_esc($val){
		$val = str_replace("\\", "\\\\", $val);
		$val = str_replace("\r", "\\r", $val);
		$val = str_replace("\n", "\\n", $val);
		$val = str_replace("'", "\\'", $val);
		return str_replace('"', '\\"', $val);
	}

	function sajax_get_one_stub($func_name){
		ob_start();
		?>

	// wrapper for <?php echo $func_name; ?>

	function x_<?php echo $func_name; ?>() {
	sajax_do_call("<?php echo $func_name; ?>",
	x_<?php echo $func_name; ?>.arguments);
	}

	<?php
		$html = ob_get_contents();
		ob_end_clean();
		return $html;
	}

	function sajax_show_one_stub($func_name){
		echo sajax_get_one_stub($func_name);
	}

	function sajax_export(){
		global $sajax_export_list;

		$n = func_num_args();
		for($i = 0; $i < $n; $i++){
			$sajax_export_list[] = func_get_arg($i);
		}
	}

	$sajax_js_has_been_shown = 0;
	function sajax_get_javascript(){
		global $sajax_js_has_been_shown;
		global $sajax_export_list;

		$html = "";
		if(!$sajax_js_has_been_shown){
			$html .= sajax_get_common_js();
			$sajax_js_has_been_shown = 1;
		}
		foreach($sajax_export_list as $func){
			$html .= sajax_get_one_stub($func);
		}
		return $html;
	}

	function sajax_show_javascript(){
		echo sajax_get_javascript();
	}


	$SAJAX_INCLUDED = 1;
}